﻿Public Class TipoDocumento
    Dim _TDOCOD, _TDODESC, _TDOABREV, _TDOVEN, _TDOFAC, _TDOACT As String

    Sub New()

    End Sub

    Sub New(ByVal TDOCOD As String, ByVal TDODESC As String, ByVal TDOABREV As String, ByVal TDOVEN As String, ByVal TDOFAC As String, _
            ByVal TDOACT As String)
        Me._TDOCOD = TDOCOD
        Me._TDODESC = TDODESC
        Me._TDOABREV = TDOABREV
        Me._TDOVEN = TDOVEN
        Me._TDOFAC = TDOFAC
        Me._TDOACT = TDOACT
    End Sub

    Public Property TDO_Codigo() As String
        Get
            Return _TDOCOD
        End Get
        Set(ByVal value As String)
            _TDOCOD = value
        End Set
    End Property

    Public Property TDO_Descripcion() As String
        Get
            Return _TDODESC
        End Get
        Set(ByVal value As String)
            _TDODESC = value
        End Set
    End Property

    Public Property TDO_Abreviatura() As String
        Get
            Return _TDOABREV
        End Get
        Set(ByVal value As String)
            _TDOABREV = value
        End Set
    End Property

    Public Property TDO_Venta() As String
        Get
            Return _TDOVEN
        End Get
        Set(ByVal value As String)
            _TDOVEN = value
        End Set
    End Property

    Public Property TDO_Factor() As String
        Get
            Return _TDOFAC
        End Get
        Set(ByVal value As String)
            _TDOFAC = value
        End Set
    End Property

    Public Property TDO_Activo() As String
        Get
            Return _TDOACT
        End Get
        Set(ByVal value As String)
            _TDOACT = value
        End Set
    End Property
End Class
